function CalcSIF(type)
